home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
FishMarket 1.0
/
FishMarket v1.0.iso
/
fishies
/
126-150
/
disk_146
/
dmemacros
/
modula-2
/
modula-2.templates
< prev
next >
Wrap
Text File
|
1992-05-06
|
842b
|
22 lines
key template command-line prompt(s) example -->
nk7 DEFINITION MODULE module name `MyModule'
nk8 IMPLEMENTATION MODULE module name `MyModule'
nk9 PROCEDURE procedure name `Proc1'
nk4 RECORD record name `mytype'
nk5 CASE scalar expression ` counter '
nk6 CASEVALUE scalar value `3'
nk1 FOR loop-limits expression `i := 3 TO 1 BY -1'
nk2 IF boolean expression ` i<j '
nk3 IFELSE boolean expression ` i<j AND j<k '
nk0 ELSIF boolean expression ` j>0 '
nk. LOOP ----- -----
nk- REPEAT termination expression `FALSE'
enter WHILE continuation expression ` counting AND (j*k > i) '
shft nk- WITH record designator `ptr^.record'
IMPORTANT: Don't forget the closing quote (and preceding space, if required)!